home *** CD-ROM | disk | FTP | other *** search
/ Transactor / Transactor_20_1987_Transactor_Publishing.d64 / mobile basic (.txt) < prev    next >
Commodore BASIC  |  2023-02-26  |  245b  |  9 lines
  1. 10 for i=0 to 18: read a: poke 828+i,a: next
  2. 20 input"start";bs: poke 831,int(bs/256)
  3. 30 poke 829,bs-(int(bs/256)*256)
  4. 40 input"end";be: poke 839,int(be/256)
  5. 50 poke 837,be-(int(be/256)*256):sys828
  6. 60 data 162,0,160,0,24,32,156,255
  7. 70 data 162,0,160,0,24,32,153,255
  8. 80 data 108,0,160
  9.